home *** CD-ROM | disk | FTP | other *** search
/ Programmer Plus 2007 / Programmer-Plus-2007.iso / Programming / XML Utilities / Professional Programmer XSL IDE / Xselerator25.msi / Data.Cab / F36798_teststrfoldl.xsl < prev    next >
Encoding:
Extensible Markup Language  |  2001-11-13  |  1018 b   |  33 lines
  1. <xsl:stylesheet version="1.0"
  2. xmlns:xsl="http://www.w3.org/1999/XSL/Transform"
  3. xmlns:msxsl="urn:schemas-microsoft-com:xslt"
  4. xmlns:saxon="http://icl.com/saxon"
  5. xmlns:str-foldl-func="f:str-foldl-func"
  6. exclude-result-prefixes="xsl str-foldl-func"
  7. >
  8.  
  9.    <xsl:import href="str-foldl.xsl"/>
  10.  
  11.    <str-foldl-func:str-foldl-func/>
  12.    <xsl:variable name="vFoldlFun" select="document('')/*/str-foldl-func:*[1]"/>
  13.     <xsl:output  encoding="UTF-8" omit-xml-declaration="yes"/>
  14.  
  15.     <xsl:template match="/">
  16.  
  17.       <xsl:call-template name="str-foldl">
  18.         <xsl:with-param name="pFunc" select="$vFoldlFun"/>
  19.         <xsl:with-param name="pStr" select="string(/*/*)"/>
  20.         <xsl:with-param name="pA0" select="0"/>
  21.       </xsl:call-template>
  22.     </xsl:template>
  23.  
  24.     <xsl:template match="str-foldl-func:*">
  25.          <xsl:param name="arg1" select="0"/>
  26.          <xsl:param name="arg2" select="0"/>
  27.          
  28.          <xsl:value-of select="$arg1 + $arg2"/>
  29.     </xsl:template>
  30.  
  31. </xsl:stylesheet>
  32.  
  33.